home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / wlib11_2.zip / EXAMPLES.EXE / EXAM29.C < prev    next >
C/C++ Source or Header  |  1991-03-13  |  1KB  |  42 lines
  1.   #include "window.h"
  2.   #define NORM   CREATE_VIDEO_ATTRIBUTE(black,white)
  3.   #define REDONWHITE  CREATE_VIDEO_ATTRIBUTE(red,white)
  4.   #define BLACKONWHITE  CREATE_VIDEO_ATTRIBUTE(white,black)
  5.  
  6.  
  7.   WPOINTER w1,w2,w3;
  8.  
  9.   main()
  10.   {
  11.     WindowInitializeSystem();
  12.     WindowSaveInitial(0);
  13.  
  14.     /* Initialize all windows */
  15.     w1 = WindowInitialize(BORDER,1,1,20,10,NORM,NORM,SINGLEBOX);
  16.     w2 = WindowInitialize(BORDER,2,2,20,10,REDONWHITE,NORM,DOUBLEBOX);
  17.     w3 = WindowInitialize(BORDER,3,3,20,10,BLACKONWHITE,NORM,SINGLEBOX);
  18.  
  19.     /* Open all windows */
  20.     WindowOpen(w1);
  21.     WindowOpen(w2);
  22.     WindowOpen(w3);
  23.  
  24.     /* Display All windows */
  25.     WindowDisplay(w1,1,NOEFFECT);
  26.     WindowDisplay(w2,2,NOEFFECT);
  27.     WindowDisplay(w3,3,NOEFFECT);
  28.  
  29.  
  30.  
  31.  
  32.     WindowWriteString(w1,"This is window 1",1,1);
  33.     WindowWriteString(w2,"This is window 2",2,1);
  34.     WindowWriteString(w3,"This is window 3",3,1);
  35.  
  36.     GET_KEY();
  37.     WindowHide(w3,NOEFFECT);
  38.     GET_KEY();
  39.     WindowHide(w2,BRICKS);
  40.     GET_KEY();
  41.     WindowHide(w1,CONTRACT);
  42.   }